Построить график функции y=2x+1- QBasic(Бейсик)

disel
1
2
3
4
5
6
7
8
9
DEF FNY (x)=2*x+1
SCREEN 12
LINE (0,240)-(640,240)
LINE (320,0)-(320,480)
K=30 'масштаб
FOR x=0 TO 640
y= 240-K*FNY((x-320)/K)
PSET (x,y),15
NEXT X

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment